Profile of (eval 32)[JSON/PP.pm:66]

Filename	(eval 32)[C:/tmp64ng/perl/lib/JSON/PP.pm:66]
Statements	Executed 27 statements in 0s
Eval Invoked At	C:/tmp64ng/perl/lib/JSON/PP.pm line 66
Sibling evals	1, 2, 3, 4, 5, 6, 7

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
0	0	0	0s	0s	JSON::PP::::get_space_afterJSON::PP::get_space_after
9	1	1	0s	0s	JSON::PP::::space_afterJSON::PP::space_after

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Code
1
2			# spent 0s within JSON::PP::space_after which was called 9 times, avg 0s/call: # 9 times (0s+0s) by JSON::PP::pretty at line 166 of JSON/PP.pm, avg 0s/call sub space_after {
3	9	0s	my $enable = defined $_[1] ? $_[1] : 1;
4
5	9	0s	if ($enable) {
6			$_[0]->{PROPS}->[P_SPACE_AFTER] = 1;
7			}
8			else {
9			$_[0]->{PROPS}->[P_SPACE_AFTER] = 0;
10			}
11
12	9	0s	$_[0];
13			}
14
15			sub get_space_after {
16			$_[0]->{PROPS}->[P_SPACE_AFTER] ? 1 : '';
17			}
18
19			;